object FPharmacyStockSub: TFPharmacyStockSub
  Left = 0
  Top = 0
  BorderStyle = bsToolWindow
  ClientHeight = 634
  ClientWidth = 831
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -19
  Font.Name = 'Segoe UI Light'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 25
  object AdvPanel1: TAdvPanel
    Left = 0
    Top = 0
    Width = 831
    Height = 634
    Align = alClient
    BevelOuter = bvNone
    Color = 16643823
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    UseDockManager = True
    Version = '2.2.0.2'
    BorderColor = 13087391
    Caption.Color = 16643823
    Caption.ColorTo = 15784647
    Caption.Font.Charset = DEFAULT_CHARSET
    Caption.Font.Color = 5978398
    Caption.Font.Height = -11
    Caption.Font.Name = 'Tahoma'
    Caption.Font.Style = []
    Caption.GradientDirection = gdVertical
    Caption.Indent = 2
    Caption.ShadeLight = 255
    CollapsColor = clNone
    CollapsDelay = 0
    ColorTo = 15784647
    ShadowColor = clBlack
    ShadowOffset = 0
    StatusBar.BorderColor = 16643823
    StatusBar.BorderStyle = bsSingle
    StatusBar.Font.Charset = DEFAULT_CHARSET
    StatusBar.Font.Color = 5978398
    StatusBar.Font.Height = -11
    StatusBar.Font.Name = 'Tahoma'
    StatusBar.Font.Style = []
    StatusBar.Color = 16643823
    StatusBar.ColorTo = 15784647
    StatusBar.GradientDirection = gdVertical
    Styler = AdvPanelStyler1
    Text = ''
    ExplicitWidth = 897
    ExplicitHeight = 713
    FullHeight = 200
    object Label24: TLabel
      Left = 12
      Top = 12
      Width = 79
      Height = 13
      Caption = 'Pharmacy Item: '
    end
    object cxGroupBox1: TcxGroupBox
      Left = 12
      Top = 34
      Margins.Left = 6
      Margins.Top = 6
      Margins.Right = 6
      Margins.Bottom = 6
      Caption = 'Stock Items'
      TabOrder = 0
      Height = 588
      Width = 809
      object AdvPanel2: TAdvPanel
        Left = 2
        Top = 18
        Width = 805
        Height = 568
        Align = alClient
        BevelOuter = bvNone
        Color = 16643823
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        UseDockManager = True
        Version = '2.2.0.2'
        BorderColor = 13087391
        Caption.Color = 16643823
        Caption.ColorTo = 15784647
        Caption.Font.Charset = DEFAULT_CHARSET
        Caption.Font.Color = 5978398
        Caption.Font.Height = -11
        Caption.Font.Name = 'Tahoma'
        Caption.Font.Style = []
        Caption.GradientDirection = gdVertical
        Caption.Indent = 2
        Caption.ShadeLight = 255
        CollapsColor = clNone
        CollapsDelay = 0
        ColorTo = 15784647
        ShadowColor = clBlack
        ShadowOffset = 0
        StatusBar.BorderColor = 16643823
        StatusBar.BorderStyle = bsSingle
        StatusBar.Font.Charset = DEFAULT_CHARSET
        StatusBar.Font.Color = 5978398
        StatusBar.Font.Height = -11
        StatusBar.Font.Name = 'Tahoma'
        StatusBar.Font.Style = []
        StatusBar.Color = 16643823
        StatusBar.ColorTo = 15784647
        StatusBar.GradientDirection = gdVertical
        Styler = AdvPanelStyler1
        Text = ''
        ExplicitWidth = 807
        ExplicitHeight = 575
        FullHeight = 200
        object cxGroupBox3: TcxGroupBox
          Left = 9
          Top = 4
          Caption = 'Item'
          Style.LookAndFeel.SkinName = 'Office2010Blue'
          Style.TransparentBorder = True
          StyleDisabled.LookAndFeel.SkinName = 'Office2010Blue'
          StyleFocused.LookAndFeel.SkinName = 'Office2010Blue'
          StyleHot.LookAndFeel.SkinName = 'Office2010Blue'
          TabOrder = 0
          Height = 167
          Width = 386
          object Label3: TLabel
            Left = 8
            Top = 24
            Width = 57
            Height = 13
            Caption = 'Department'
          end
          object Label1: TLabel
            Left = 8
            Top = 51
            Width = 56
            Height = 13
            Caption = 'Expiry Date'
          end
          object cxDBLookupComboBox3: TcxDBLookupComboBox
            Left = 96
            Top = 21
            DataBinding.DataField = 'dept_id'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            Properties.KeyFieldNames = 'nr'
            Properties.ListColumns = <
              item
                FieldName = 'name_formal'
              end>
            Properties.ListSource = dmSettings.DSCareDepartment
            TabOrder = 0
            Width = 257
          end
          object cxDBDateEdit1: TcxDBDateEdit
            Left = 96
            Top = 48
            DataBinding.DataField = 'expiry_date'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            TabOrder = 1
            Width = 257
          end
        end
        object cxGroupBox2: TcxGroupBox
          Left = 412
          Top = 7
          Caption = 'Pricing'
          Style.LookAndFeel.SkinName = 'Office2010Blue'
          Style.TransparentBorder = True
          StyleDisabled.LookAndFeel.SkinName = 'Office2010Blue'
          StyleFocused.LookAndFeel.SkinName = 'Office2010Blue'
          StyleHot.LookAndFeel.SkinName = 'Office2010Blue'
          TabOrder = 1
          Height = 167
          Width = 386
          object Label4: TLabel
            Left = 14
            Top = 51
            Width = 48
            Height = 13
            Caption = 'Cost Price'
          end
          object Label2: TLabel
            Left = 14
            Top = 24
            Width = 44
            Height = 13
            Caption = 'Currency'
          end
          object Label5: TLabel
            Left = 14
            Top = 78
            Width = 41
            Height = 13
            Caption = 'Discount'
          end
          object Label6: TLabel
            Left = 14
            Top = 105
            Width = 56
            Height = 13
            Caption = 'Selling Price'
          end
          object Label22: TLabel
            Left = 272
            Top = 24
            Width = 3
            Height = 13
          end
          object Label23: TLabel
            Left = 14
            Top = 132
            Width = 18
            Height = 13
            Caption = 'Qty'
          end
          object cxDBTextEdit1: TcxDBTextEdit
            Left = 113
            Top = 48
            DataBinding.DataField = 'cost_price'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            Properties.OnEditValueChanged = cxDBTextEdit1PropertiesEditValueChanged
            TabOrder = 0
            Width = 153
          end
          object cxDBLookupComboBox2: TcxDBLookupComboBox
            Left = 113
            Top = 21
            DataBinding.DataField = 'currency_id'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            Properties.KeyFieldNames = 'currency_id'
            Properties.ListColumns = <
              item
                FieldName = 'currency_label'
              end>
            Properties.ListSource = DMItems.DShis_currency
            Properties.OnEditValueChanged = cxDBLookupComboBox2PropertiesEditValueChanged
            TabOrder = 1
            Width = 153
          end
          object cxDBTextEdit2: TcxDBTextEdit
            Left = 113
            Top = 102
            DataBinding.DataField = 'sell_price'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            Enabled = False
            TabOrder = 2
            Width = 153
          end
          object cxDBTextEdit3: TcxDBTextEdit
            Left = 113
            Top = 75
            DataBinding.DataField = 'discount'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            Enabled = False
            Properties.OnEditValueChanged = cxDBTextEdit3PropertiesEditValueChanged
            TabOrder = 3
            Width = 153
          end
          object cxDBTextEdit19: TcxDBTextEdit
            Left = 113
            Top = 129
            DataBinding.DataField = 'qty'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            TabOrder = 4
            Width = 153
          end
          object DBCheckBox1: TDBCheckBox
            Left = 272
            Top = 50
            Width = 97
            Height = 17
            Caption = 'VAT'
            DataField = 'vat'
            DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            ParentShowHint = False
            ShowHint = False
            TabOrder = 5
            ValueChecked = '1'
            ValueUnchecked = '0'
          end
        end
        object cxGroupBox4: TcxGroupBox
          Left = 9
          Top = 187
          Caption = 'CNSS'
          Style.LookAndFeel.SkinName = 'Office2010Blue'
          Style.TransparentBorder = True
          StyleDisabled.LookAndFeel.SkinName = 'Office2010Blue'
          StyleFocused.LookAndFeel.SkinName = 'Office2010Blue'
          StyleHot.LookAndFeel.SkinName = 'Office2010Blue'
          TabOrder = 2
          Height = 121
          Width = 386
          object Label7: TLabel
            Left = 8
            Top = 24
            Width = 57
            Height = 13
            Caption = 'CNSS Etage'
          end
          object Label8: TLabel
            Left = 8
            Top = 51
            Width = 48
            Height = 13
            Caption = 'CNSS Bloc'
          end
          object Label9: TLabel
            Left = 8
            Top = 78
            Width = 62
            Height = 13
            Caption = 'CNSS Urgent'
          end
          object cxDBTextEdit4: TcxDBTextEdit
            Left = 96
            Top = 21
            DataBinding.DataField = 'cnss_etage'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            TabOrder = 0
            Width = 257
          end
          object cxDBTextEdit5: TcxDBTextEdit
            Left = 96
            Top = 48
            DataBinding.DataField = 'cnss_bloc'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            TabOrder = 1
            Width = 257
          end
          object cxDBTextEdit6: TcxDBTextEdit
            Left = 96
            Top = 75
            DataBinding.DataField = 'cnss_urgent'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            TabOrder = 2
            Width = 257
          end
        end
        object cxGroupBox5: TcxGroupBox
          Left = 412
          Top = 187
          Caption = 'COOP'
          Style.LookAndFeel.SkinName = 'Office2010Blue'
          Style.TransparentBorder = True
          StyleDisabled.LookAndFeel.SkinName = 'Office2010Blue'
          StyleFocused.LookAndFeel.SkinName = 'Office2010Blue'
          StyleHot.LookAndFeel.SkinName = 'Office2010Blue'
          TabOrder = 3
          Height = 121
          Width = 386
          object Label10: TLabel
            Left = 8
            Top = 24
            Width = 60
            Height = 13
            Caption = 'COOP Etage'
          end
          object Label11: TLabel
            Left = 8
            Top = 51
            Width = 51
            Height = 13
            Caption = 'COOP Bloc'
          end
          object Label12: TLabel
            Left = 8
            Top = 78
            Width = 65
            Height = 13
            Caption = 'COOP Urgent'
          end
          object cxDBTextEdit7: TcxDBTextEdit
            Left = 96
            Top = 21
            DataBinding.DataField = 'coop_etage'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            TabOrder = 0
            Width = 257
          end
          object cxDBTextEdit8: TcxDBTextEdit
            Left = 96
            Top = 48
            DataBinding.DataField = 'coop_bloc'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            TabOrder = 1
            Width = 257
          end
          object cxDBTextEdit9: TcxDBTextEdit
            Left = 96
            Top = 75
            DataBinding.DataField = 'coop_urgent'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            TabOrder = 2
            Width = 257
          end
        end
        object cxGroupBox6: TcxGroupBox
          Left = 9
          Top = 314
          Caption = 'Private'
          Style.LookAndFeel.SkinName = 'Office2010Blue'
          Style.TransparentBorder = True
          StyleDisabled.LookAndFeel.SkinName = 'Office2010Blue'
          StyleFocused.LookAndFeel.SkinName = 'Office2010Blue'
          StyleHot.LookAndFeel.SkinName = 'Office2010Blue'
          TabOrder = 4
          Height = 121
          Width = 386
          object Label13: TLabel
            Left = 8
            Top = 24
            Width = 65
            Height = 13
            Caption = 'Private Etage'
          end
          object Label14: TLabel
            Left = 8
            Top = 51
            Width = 56
            Height = 13
            Caption = 'Private Bloc'
          end
          object Label15: TLabel
            Left = 8
            Top = 78
            Width = 70
            Height = 13
            Caption = 'Private Urgent'
          end
          object cxDBTextEdit10: TcxDBTextEdit
            Left = 96
            Top = 21
            DataBinding.DataField = 'private_etage'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            TabOrder = 0
            Width = 257
          end
          object cxDBTextEdit11: TcxDBTextEdit
            Left = 96
            Top = 48
            DataBinding.DataField = 'private_bloc'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            TabOrder = 1
            Width = 257
          end
          object cxDBTextEdit12: TcxDBTextEdit
            Left = 96
            Top = 75
            DataBinding.DataField = 'private_urgent'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            TabOrder = 2
            Width = 257
          end
        end
        object cxGroupBox7: TcxGroupBox
          Left = 412
          Top = 314
          Caption = 'Armee'
          Style.LookAndFeel.SkinName = 'Office2010Blue'
          Style.TransparentBorder = True
          StyleDisabled.LookAndFeel.SkinName = 'Office2010Blue'
          StyleFocused.LookAndFeel.SkinName = 'Office2010Blue'
          StyleHot.LookAndFeel.SkinName = 'Office2010Blue'
          TabOrder = 5
          Height = 121
          Width = 386
          object Label16: TLabel
            Left = 8
            Top = 24
            Width = 62
            Height = 13
            Caption = 'Armee Etage'
          end
          object Label17: TLabel
            Left = 8
            Top = 51
            Width = 53
            Height = 13
            Caption = 'Armee Bloc'
          end
          object Label18: TLabel
            Left = 8
            Top = 78
            Width = 67
            Height = 13
            Caption = 'Armee Urgent'
          end
          object cxDBTextEdit13: TcxDBTextEdit
            Left = 96
            Top = 21
            DataBinding.DataField = 'armee_etage'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            TabOrder = 0
            Width = 257
          end
          object cxDBTextEdit14: TcxDBTextEdit
            Left = 96
            Top = 48
            DataBinding.DataField = 'armee_bloc'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            TabOrder = 1
            Width = 257
          end
          object cxDBTextEdit15: TcxDBTextEdit
            Left = 96
            Top = 75
            DataBinding.DataField = 'armee_urgent'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            TabOrder = 2
            Width = 257
          end
        end
        object cxGroupBox8: TcxGroupBox
          Left = 9
          Top = 441
          Caption = 'Self Pay'
          Style.LookAndFeel.SkinName = 'Office2010Blue'
          Style.TransparentBorder = True
          StyleDisabled.LookAndFeel.SkinName = 'Office2010Blue'
          StyleFocused.LookAndFeel.SkinName = 'Office2010Blue'
          StyleHot.LookAndFeel.SkinName = 'Office2010Blue'
          TabOrder = 6
          Height = 121
          Width = 386
          object Label19: TLabel
            Left = 8
            Top = 24
            Width = 70
            Height = 13
            Caption = 'Self Pay Etage'
          end
          object Label20: TLabel
            Left = 8
            Top = 51
            Width = 61
            Height = 13
            Caption = 'Self Pay Bloc'
          end
          object Label21: TLabel
            Left = 8
            Top = 78
            Width = 75
            Height = 13
            Caption = 'Self Pay Urgent'
          end
          object cxDBTextEdit16: TcxDBTextEdit
            Left = 96
            Top = 21
            DataBinding.DataField = 'self_pay_etage'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            TabOrder = 0
            Width = 257
          end
          object cxDBTextEdit17: TcxDBTextEdit
            Left = 96
            Top = 48
            DataBinding.DataField = 'self_pay_bloc'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            TabOrder = 1
            Width = 257
          end
          object cxDBTextEdit18: TcxDBTextEdit
            Left = 96
            Top = 75
            DataBinding.DataField = 'self_pay_urgent'
            DataBinding.DataSource = DMPharmacy.DShis_pharmacy_stock_sub
            TabOrder = 2
            Width = 257
          end
        end
        object Save: TcxButton
          Left = 723
          Top = 537
          Width = 75
          Height = 25
          Caption = 'Save'
          TabOrder = 7
          OnClick = SaveClick
        end
      end
    end
    object cxLookupComboBox1: TcxLookupComboBox
      Left = 97
      Top = 9
      Properties.KeyFieldNames = 'parmacy_stock_id'
      Properties.ListColumns = <
        item
          FieldName = 'name1'
        end>
      Properties.ListSource = DMPharmacy.DShis_parmacy_stock
      Properties.OnEditValueChanged = cxLookupComboBox1PropertiesEditValueChanged
      TabOrder = 1
      Width = 301
    end
  end
  object AdvPanelStyler1: TAdvPanelStyler
    Tag = 0
    Settings.AnchorHint = False
    Settings.BevelInner = bvNone
    Settings.BevelOuter = bvNone
    Settings.BevelWidth = 1
    Settings.BorderColor = 13087391
    Settings.BorderShadow = False
    Settings.BorderStyle = bsNone
    Settings.BorderWidth = 0
    Settings.CanMove = False
    Settings.CanSize = False
    Settings.Caption.Color = 16643823
    Settings.Caption.ColorTo = 15784647
    Settings.Caption.Font.Charset = DEFAULT_CHARSET
    Settings.Caption.Font.Color = 5978398
    Settings.Caption.Font.Height = -11
    Settings.Caption.Font.Name = 'Tahoma'
    Settings.Caption.Font.Style = []
    Settings.Caption.GradientDirection = gdVertical
    Settings.Caption.Indent = 2
    Settings.Caption.ShadeLight = 255
    Settings.Collaps = False
    Settings.CollapsColor = clNone
    Settings.CollapsDelay = 0
    Settings.CollapsSteps = 0
    Settings.Color = 16643823
    Settings.ColorTo = 15784647
    Settings.ColorMirror = clNone
    Settings.ColorMirrorTo = clNone
    Settings.Cursor = crDefault
    Settings.Font.Charset = DEFAULT_CHARSET
    Settings.Font.Color = clBlack
    Settings.Font.Height = -11
    Settings.Font.Name = 'Tahoma'
    Settings.Font.Style = []
    Settings.FixedTop = False
    Settings.FixedLeft = False
    Settings.FixedHeight = False
    Settings.FixedWidth = False
    Settings.Height = 120
    Settings.Hover = False
    Settings.HoverColor = clNone
    Settings.HoverFontColor = clNone
    Settings.Indent = 0
    Settings.ShadowColor = clBlack
    Settings.ShadowOffset = 0
    Settings.ShowHint = False
    Settings.ShowMoveCursor = False
    Settings.StatusBar.BorderColor = 16643823
    Settings.StatusBar.BorderStyle = bsSingle
    Settings.StatusBar.Font.Charset = DEFAULT_CHARSET
    Settings.StatusBar.Font.Color = 5978398
    Settings.StatusBar.Font.Height = -11
    Settings.StatusBar.Font.Name = 'Tahoma'
    Settings.StatusBar.Font.Style = []
    Settings.StatusBar.Color = 16643823
    Settings.StatusBar.ColorTo = 15784647
    Settings.StatusBar.GradientDirection = gdVertical
    Settings.TextVAlign = tvaTop
    Settings.TopIndent = 0
    Settings.URLColor = clBlue
    Settings.Width = 0
    Style = psOffice2010Blue
    Left = 440
    Top = 504
  end
end
